Dim WshShell
Set WshShell = Wscript.CreateObject("Wscript.Shell")

WshShell.RegWrite "HKCU\Software\KluczTestowy\ ", 0, "REG_BINARY"
WshShell.RegWrite "HKCU\Software\KluczTestowy\PodkluczTestowy\", 1, "REG_BINARY"
WshShell.RegWrite "HKCU\Software\KluczTestowy\PodkluczTestowy\Test", "warto", "REG_SZ"

Wscript.Echo WshShell.RegRead("HKCU\Software\KluczTestowy\PodkluczTestowy\Test")
